; /////////////////////////////////////////////////////////////////////////////
;
;     This file is part of PurePicBasic.
; 
;     PurePicBasic is free software: you can redistribute it And/Or modify
;     it under the terms of the GNU General Public License As published by
;     the Free Software Foundation, either version 3 of the License, Or
;     (at your option) any later version.
; 
;     PurePicBasic is distributed in the hope that it will be useful,
;     but WITHOUT ANY WARRANTY; without even the implied warranty of
;     MERCHANTABILITY Or FITNESS For A PARTICULAR PURPOSE.  See the
;     GNU General Public License For more details.
; 
;     You should have received a copy of the GNU General Public License
;     along With PurePicBasic.  If Not, see <http://www.gnu.org/licenses/>.
;
; /////////////////////////////////////////////////////////////////////////////


; /////////////////////////////////////////////////////////////////////////////
;
; /////////////////////////////////////////////////////////////////////////////
; Procedure _set_memory_map_(bank.i, name.s, address.i)
;   chipset(currentChipset)\bank(bank)\register(name)\address = address
; EndProcedure
; 
; ; /////////////////////////////////////////////////////////////////////////////
; ;
; ; /////////////////////////////////////////////////////////////////////////////
; Procedure.i _get_memory_map_address_(bank.i, name.s)
;   If FindMapElement(chipset(currentChipset)\bank(bank)\register(), name) <> #False 
;     ProcedureReturn chipset(currentChipset)\bank(bank)\register(name)\address
;   EndIf 
;   ProcedureReturn -1
; EndProcedure
; 
; ; /////////////////////////////////////////////////////////////////////////////
; ;
; ; /////////////////////////////////////////////////////////////////////////////
; Procedure.b _is_memory_map_(bank.i, name.s)
;   If FindMapElement(chipset(currentChipset)\bank(bank)\register(), name) <> #False 
;     ProcedureReturn #True 
;   EndIf 
;   ProcedureReturn #False 
; EndProcedure
; 
; ; /////////////////////////////////////////////////////////////////////////////
; ;
; ; /////////////////////////////////////////////////////////////////////////////
; Procedure _set_register_bit_(bank.i, name.s, bitName.i, address.i)
;    chipset(currentChipset)\bank(bank)\register(name)\bit(bitName) = address
; EndProcedure
;  
; ; /////////////////////////////////////////////////////////////////////////////
; ;
; ; /////////////////////////////////////////////////////////////////////////////
; Procedure _get_register_bit_(bank.i, name.s, bitName.i)
;    chipset(currentChipset)\bank(bank)\register(name)\bit(bitName) = address
; EndProcedure




; ; /////////////////////////////////////////////////////////////////////////////
; ;
; ; /////////////////////////////////////////////////////////////////////////////
; Procedure _set_register_(name.s, address.i)
;   If FindMapElement( chipset(currentChipset)\register() , name ) = #Null 
;     chipset(currentChipset)\register(name) = address
;   EndIf 
; EndProcedure
; 
; ; /////////////////////////////////////////////////////////////////////////////
; ;
; ; /////////////////////////////////////////////////////////////////////////////
; Procedure _set_register_bit_(name.s, address.i)
;   If FindMapElement( chipset(currentChipset)\register_bit() , name ) = #Null 
;     chipset(currentChipset)\register_bit(name) = address
;   EndIf 
; EndProcedure
; 
; ; /////////////////////////////////////////////////////////////////////////////
; ;
; ; /////////////////////////////////////////////////////////////////////////////
; Procedure.i _get_register_address_(name.s)
;   If FindMapElement( chipset(currentChipset)\register() , name ) = #Null 
;     ProcedureReturn chipset(currentChipset)\register(name)
;   EndIf 
; EndProcedure
; 
; ; /////////////////////////////////////////////////////////////////////////////
; ;
; ; /////////////////////////////////////////////////////////////////////////////
; Procedure.i _get_register_bit_address_(name.s)
;   If FindMapElement( chipset(currentChipset)\register_bit() , name ) = #Null 
;     ProcedureReturn chipset(currentChipset)\register_bit(name)
;   EndIf 
; EndProcedure
